inherited fmCariKontrol: TfmCariKontrol
  Left = 210
  Top = 130
  Caption = 'Cari Kontrol'
  ClientHeight = 479
  ClientWidth = 1040
  KeyPreview = True
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox [0]
    Left = 0
    Top = 77
    Width = 520
    Height = 402
    Align = alLeft
    Caption = '  Prg Cari Listesi  '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object grdPrgCariList: TwwDBGrid
      Left = 2
      Top = 15
      Width = 516
      Height = 385
      DisableThemes = False
      ControlType.Strings = (
        'Aktif;CheckBox;A;P')
      Selected.Strings = (
        'Carikodu'#9'20'#9'Carikodu'#9'F'
        'FirmaAdi'#9'30'#9'Firma Ad'#305#9'F'
        'UnityCarikod'#9'10'#9'UnityCarikod'
        'Aktif'#9'1'#9'Aktif')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = dsaqPrgCariList
      KeyOptions = [dgEnterToTab, dgAllowDelete, dgAllowInsert]
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
      OnTitleButtonClick = grdPrgCariListTitleButtonClick
    end
  end
  object GroupBox2: TGroupBox [1]
    Left = 520
    Top = 77
    Width = 520
    Height = 402
    Align = alClient
    Caption = '  Prg Cari Listesi  '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    object grdUnityCariList: TwwDBGrid
      Left = 2
      Top = 15
      Width = 516
      Height = 385
      DisableThemes = False
      Selected.Strings = (
        'CODE'#9'20'#9'Carikodu'#9'F'
        'DEFINITION_'#9'30'#9'Firma Ad'#305#9'F'
        'LOGICALREF'#9'10'#9'UnityCarikod'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = dsUnityCariList
      KeyOptions = [dgEnterToTab, dgAllowDelete, dgAllowInsert]
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
      OnTitleButtonClick = grdPrgCariListTitleButtonClick
    end
  end
  object Panel1: TPanel [2]
    Left = 0
    Top = 0
    Width = 1040
    Height = 77
    Align = alTop
    TabOrder = 2
    object Label1: TLabel
      Left = 6
      Top = 10
      Width = 42
      Height = 13
      Caption = 'Carikodu'
      Transparent = True
    end
    object Label2: TLabel
      Left = 6
      Top = 33
      Width = 43
      Height = 13
      Caption = 'Firma Ad'#305
      Transparent = True
    end
    object Label3: TLabel
      Left = 5
      Top = 55
      Width = 63
      Height = 13
      Caption = 'Unity Carikod'
      Transparent = True
    end
    object Carikodu: TwwDBEdit
      Left = 76
      Top = 6
      Width = 167
      Height = 21
      TabOrder = 0
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object FirmaAdi: TwwDBEdit
      Left = 76
      Top = 29
      Width = 167
      Height = 21
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object btListele: TBitBtn
      Left = 252
      Top = 15
      Width = 103
      Height = 50
      Action = acListele
      Caption = 'Listele'
      TabOrder = 3
    end
    object UnityCarikod: TwwDBEdit
      Left = 76
      Top = 52
      Width = 167
      Height = 21
      TabOrder = 2
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
  end
  inherited alKeyControl: TActionList
    Left = 856
    Top = 344
    object acListele: TAction
      Caption = 'Listele'
      ShortCut = 116
      OnExecute = acListeleExecute
    end
  end
  inherited XPManifest: TXPManifest
    Left = 856
    Top = 400
  end
  object dsaqPrgCariList: TDataSource
    DataSet = aqPrgCariList
    Left = 472
    Top = 241
  end
  object dsUnityCariList: TDataSource
    DataSet = aqUnityCariList
    Left = 560
    Top = 241
  end
  object aqPrgCariList: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select Carikodu,FirmaAdi,UnityCarikod,Aktif From Cari Where 1=2')
    Left = 472
    Top = 193
  end
  object aqUnityCariList: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select CODE,DEFINITION_,LOGICALREF From unity_cari Where 1=2')
    Left = 560
    Top = 189
  end
end
